home *** CD-ROM | disk | FTP | other *** search
-
-
-
- SSSSPPPPPPPPDDDDIIII((((3333FFFF)))) SSSSPPPPPPPPDDDDIIII((((3333FFFF))))
-
-
-
- NNNNAAAAMMMMEEEE
- SPPDI - SPPDI computes the determinant and inverse of a real symmetric
- positive definite matrix using the factors computed by SPPCO or SPPFA .
-
-
- SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
- SUBROUTINE SPPDI(AP,N,DET,JOB)
-
- DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
- On Entry
-
- AAAAPPPP REAL (N*(N+1)/2)
- the output from SPPCO or SPPFA.
-
- NNNN INTEGER
- the order of the matrix A .
-
- JJJJOOOOBBBB INTEGER
- = 11 both determinant and inverse.
- = 01 inverse only.
- = 10 determinant only. On Return
-
- AAAAPPPP the upper triangular half of the inverse .
- The strict lower triangle is unaltered.
-
- DDDDEEEETTTT REAL(2)
- determinant of original matrix if requested.
- Otherwise not referenced.
- Determinant = DET(1) * 10.0**DET(2)
- with 1.0 .LE. DET(1) .LT. 10.0
- or DET(1) .EQ. 0.0 . Error Condition
-
- AAAA division by zero will occur if the input factor contains a zero on the
- diagonal and the inverse is requested. It will not occur if the
- subroutines are called correctly and if SPOCO or SPOFA has set INFO .EQ.
- 0 . LINPACK. This version dated 08/14/78 . Cleve Moler, University of
- New Mexico, Argonne National Lab. Subroutines and Functions BLAS
- SAXPY,SSCAL Fortran MOD
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-